﻿Public NotInheritable Class SplashScreen
    Private Sub SplashScreen_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.Version.Text = "Assembly Version " + Me.GetType.Assembly.GetName.Version.ToString
        Me.Version2.Text = "File Version " + Diagnostics.FileVersionInfo.GetVersionInfo(Application.ExecutablePath).FileVersion
    End Sub

    Private Sub EndProgram(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Me.Visible = False
    End Sub
End Class
